﻿Public Class ucHangnhap

    Private Sub newButton_Click(sender As Object, e As EventArgs) Handles newButton.Click
        Dim uc As New ucCapnhatHangnhap
        uc.Dock = DockStyle.Fill
        Dim parent = DirectCast(Application.OpenForms.Item(0), Main)
        parent.ShowModalPanel(uc, DevComponents.DotNetBar.Controls.eSlideSide.Left)
    End Sub

End Class
